<Serializable()> _
Public Class BasicSongData
    Dim _Artist As String
    Private _UnixTimestampTrackStartedPlaying As Long = 0
    Public Property UnixTimestampTrackStartedPlaying() As Long
        Get
            Return _UnixTimestampTrackStartedPlaying
        End Get
        Set(ByVal value As Long)
            _UnixTimestampTrackStartedPlaying = value
        End Set
    End Property
    Public Property Artist() As String
        Get
            Return _Artist
        End Get
        Set(ByVal value As String)
            _Artist = value
        End Set
    End Property
    Dim _Album As String
    Public Property Album() As String
        Get
            Return _Album
        End Get
        Set(ByVal value As String)
            _Album = value
        End Set
    End Property
    Dim _TrackName As String
    Public Property TrackName() As String
        Get
            Return _TrackName
        End Get
        Set(ByVal value As String)
            _TrackName = value
        End Set
    End Property
    Dim _TrackNumber As String
    Public Property TrackNumber() As String
        Get
            Return _TrackNumber
        End Get
        Set(ByVal value As String)
            _TrackNumber = value
        End Set
    End Property

    Public _LenghtInSeconds As Integer = 0
    Public Property LengthInSeconds() As Integer
        Get
            Return _LenghtInSeconds
        End Get
        Set(ByVal value As Integer)
            _LenghtInSeconds = value
        End Set
    End Property


    Sub New(ByVal artist As String, ByVal album As String, ByVal trackName As String, ByVal trackNumber As String)
        Me.Artist = artist
        Me.Album = album
        Me.TrackName = trackName
        Me.TrackNumber = trackNumber
        SongDataFilled = True
    End Sub
    Dim SongDataFilled As Boolean = False

    Sub New()

    End Sub
End Class
